home *** CD-ROM | disk | FTP | other *** search
/ MacWorld 1998 October / Macworld (1998-10).dmg / Serious Demos / Morpha / 3DO.DXR / 00123.ls < prev    next >
Encoding:
Text File  |  1998-07-31  |  275 b   |  17 lines
  1. on dropdrums2
  2.   global st, wait, drumonly, drums
  3.   redraw()
  4.   set the visible of sprite 3 to 1
  5.   updateStage()
  6.   set st to 1
  7.   set wait to 1
  8.   if drumonly = 1 then
  9.     nothing()
  10.   else
  11.     mixdown()
  12.     puppetSound(1, 0)
  13.     set drums to 0
  14.     set drumonly to 0
  15.   end if
  16. end
  17.